home *** CD-ROM | disk | FTP | other *** search
- object Form2: TForm2
- Left = -27
- Top = 367
- BorderIcons = []
- BorderStyle = bsNone
- Caption = 'Form2'
- ClientHeight = 461
- ClientWidth = 640
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- PixelsPerInch = 96
- Position = poDefault
- WindowState = wsMaximized
- OnClose = FormClose
- OnShow = FormShow
- TextHeight = 16
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 640
- Height = 461
- Align = alClient
- end
- object Label1: TLabel
- Left = 201
- Top = 408
- Width = 424
- Height = 43
- AutoSize = False
- Caption = 'HYPER INTERACTIVITY'
- Font.Color = clYellow
- Font.Height = -37
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- Transparent = True
- end
- object Memo1: TMemo
- Left = 25
- Top = 16
- Width = 320
- Height = 353
- Font.Color = clBlue
- Font.Height = -15
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ScrollBars = ssVertical
- TabOrder = 0
- end
- object mov: TBitBtn
- Left = 16
- Top = 392
- Width = 105
- Height = 25
- Caption = 'Stop Move'
- TabOrder = 1
- OnClick = movClick
- OnMouseMove = movMouseMove
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
- 0000377777777777777703030303030303037F7F7F7F7F7F7F7F000000000000
- 00007777777777777777933393303933337073F37F37F73F3377393393303393
- 379037FF7F37F37FF777379793303379793037777337F3777737339933303339
- 93303377F3F7F3F77F3733993930393993303377F737F7377FF7399993303399
- 999037777337F377777793993330333393307377FF37F3337FF7333993303333
- 993033377F37F33377F7333993303333993033377337F3337737333333303333
- 33303FFFFFF7FFFFFFF700000000000000007777777777777777030303030303
- 03037F7F7F7F7F7F7F7F000000000000000077777777777777770000}
- NumGlyphs = 2
- end
- object back: TBitBtn
- Left = 16
- Top = 424
- Width = 81
- Height = 25
- Caption = 'Back'
- TabOrder = 2
- OnClick = backClick
- OnMouseMove = backMouseMove
- Kind = bkAbort
- end
- object PR: TBitBtn
- Left = 113
- Top = 424
- Width = 80
- Height = 25
- Caption = 'PRINT'
- TabOrder = 3
- OnClick = PRClick
- OnMouseMove = PRMouseMove
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
- 003337777777777777F330FFFFFFFFFFF03337F33F333F3337F330FF0FFF0FFF
- F03337F37F337F3337F330FF0FFF0FFFF03337F37FFF7FFF37F330F00000000F
- F03337F77777777337F330FFF0FFF0FFF03337F337F337F337F330FFF0FFF0FF
- F03337F337FFF7FFF7F330FF00000000F03337F37777777737F330FFFF0FFF0F
- F03337F3337F337F37F330FFFF0FFF0FF03337F33373337337F330FFFFFFFFFF
- F03337F33333333FF7F330FFFFFFFF00003337F33333337777F330FFFFFFFF0F
- F03337FFFFFFFF7F373330999999990F033337777777777F733330FFFFFFFF00
- 333337FFFFFFFF77333330000000000333333777777777733333}
- NumGlyphs = 2
- end
- object Memo2: TMemo
- Left = 16
- Top = 8
- Width = 593
- Height = 409
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- Lines.Strings = (
- 'Memo2')
- ParentFont = False
- ScrollBars = ssVertical
- TabOrder = 4
- Visible = False
- end
- object Timer1: TTimer
- Interval = 2000
- OnTimer = Timer1Timer
- Left = 159
- Top = 386
- end
- end
-